(ange-ftp-tmp-name-template): Use temporary-file-directory.

diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index ecee7db88dfee6b60c0b9f5f268c48f25b50f4aa..0002e3f3c77e3a327069b73235aa451ee7032b7f 100644 (file)
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -701,7 +701,7 @@ These mean that the FTP process should (or already has) been killed."
   :type 'regexp)
 
 (defcustom ange-ftp-tmp-name-template 
-  (concat system-tmp-directory "/ange-ftp")
+  (expand-file-name "ange-ftp" temporary-file-directory)
   "*Template used to create temporary files."
   :group 'ange-ftp
   :type 'directory)